﻿Option Explicit On
Option Strict On

Partial Class Account_ChangePassword
    Inherits System.Web.UI.Page

    Protected Sub ChangeUserPassword_SendingMail(sender As Object, e As System.Web.UI.WebControls.MailMessageEventArgs) Handles ChangeUserPassword.SendingMail
        Dim emaillog As New LogginsLogDSTableAdapters.SPTableAdapter()
        emaillog.usp_MembershipEmailsOutgoingLogInsert(e.Message.From.Address, e.Message.To.FirstOrDefault.Address, e.Message.Subject, e.Message.Body.ToString(), DateTime.Now)
        PasswordChangeSuccessPopupExtender.Show()
    End Sub

    Protected Sub Page_Load(sender As Object, e As EventArgs) Handles Me.Load

    End Sub
    Protected Sub btnCancel_Click(sender As Object, e As EventArgs) Handles btnCancel.Click
        Response.Redirect("~/private/default.aspx.aspx")
    End Sub

End Class
